﻿Imports Microsoft.VisualBasic
Imports System
Imports System.Windows.Forms
Imports Safabyte.Net.Mail
Imports Safabyte.Net.Mime
Imports System.IO
Partial Public Class MessageViewer
    Private _client As Safabyte.Net.Mail.ImapClient
    Private _uniqueId As String
    Private _msg As MailMessage
    Private _abort As Boolean

    Public Sub New(ByVal client As Safabyte.Net.Mail.ImapClient, ByVal uniqueId As String)
        InitializeComponent()

        _client = client
        _uniqueId = uniqueId
    End Sub
    Private Sub MessageViewer_Loaded(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs) Handles Me.Loaded
        GeneralTasks.ChangeTheme(Me)
        GeneralTasks.EnumerateandFill(Me.LogicalChildren)
       
    End Sub
End Class
